;; This buffer is for notes you don't want to save, and for Lisp evaluation.
;; If you want to create a file, visit that file with C-x C-f,
;; then enter the text in that file's own buffer.

(/ 7.34  9.26)
0.7926565874730022
(/ 7.50 9.00)
(setq dia 9.7)
(setq c (sqrt (+ (* 1200 1200) (* 824 824))))
(setq sina (/ 824 c))
(setq cosa (/ 1200 c))
(setq a (* dia sina))
(setq b (* dia cosa))
(setq tana 
